home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / FREENET / SMITH / FREENEWS.SPK / !FreeNews / !Run < prev    next >
Text File  |  1996-04-22  |  2KB  |  42 lines
  1. Set FreeNews$Dir <Obey$Dir>
  2. RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions
  3.  
  4. RMENSURE FilterManager 0.09 RMLoad System:modules.FilterMgr
  5. RMENSURE FilterManager 0.09 Error You Need filter manager 0.09 or later
  6.  
  7. |
  8. | The following line may cause the dreaded Drawfile bug: "nager:Sprites22". If it
  9. | does, you must ensure that the latest copy of the Drawfile module is in System:Modules,
  10. | and that older versions are not around. Anywhere.
  11. |
  12. RMEnsure Toolbox 1.36 RMLoad System:modules.toolbox.toolbox
  13. RMEnsure Toolbox 1.36 Error You need Toolbox 1.36 or later to run !FreeNews
  14.  
  15. RMENSURE Window  0.00  RMLOAD System:modules.toolbox.window
  16. RMENSURE Window  1.17  ERROR You need window 1.17 or later to run !FreeNews
  17.  
  18. RMENSURE Menu  0.00  RMLOAD System:modules.toolbox.menu
  19. RMENSURE Menu  0.13  ERROR You need menu 0.13 or later to run !FreeNews
  20.  
  21. RMENSURE ProgInfo  0.00  RMLOAD System:modules.toolbox.proginfo
  22. RMENSURE Proginfo  0.00  ERROR You need proginfo to run !FreeNews
  23.  
  24. RMENSURE IconBar  0.00  RMLOAD System:modules.toolbox.IconBar
  25. RMENSURE IconBar  0.00  ERROR You need IconBar to run !FreeNews
  26.  
  27. WimpSlot -min 128K -max 228K
  28. IconSprites <FreeNews$Dir>.!Sprites
  29.  
  30. | Use our own outgoing dir. unless there's one already
  31. Unset FreeNews$MailFlag
  32. seteval xxx 0
  33. If "<Mail$Dir>" = "" then seteval xxx <xxx> + 1
  34. If "<NewsDir$Dir>" = "" then seteval xxx <xxx> + 1
  35. |If <xxx> > 0 Then Set FreeNews$MailFlag -nomaildir
  36.  
  37. |If ("<Mail$Dir>" = "") and ("<NewsDir$Dir>" = "") Then Set FreeNews$MailFlag -nomaildir
  38. |If "<Mail$Dir>" = "" Then Set Mail$Dir <FreeNews$Dir>.Outgoing
  39.  
  40.  
  41. Syslogd_debug 1
  42. If "<FreeNews$MailFlag>" = "" then Run <FreeNews$Dir>.!RunImage %*0 else Run <FreeNews$Dir>.!RunImage -nomaildir %*0